﻿Imports System.Data.SqlClient

Public Class CDocGiaDTO
    ' ma hoten diachi ngaysinh email ngaylapthe ngayhethan tongno maloaidocgia  manhanvien

    Private m_iMa As Integer
    Public Property Ma() As Integer
        Get
            Return m_iMa
        End Get
        Set(ByVal value As Integer)
            m_iMa = value
        End Set
    End Property


    Private m_sHoTen As String
    Public Property HoTen() As String
        Get
            Return m_sHoTen
        End Get
        Set(ByVal value As String)
            m_sHoTen = value
        End Set
    End Property


    Private m_sDiChi As String
    Public Property DiaChi() As String
        Get
            Return m_sDiChi
        End Get
        Set(ByVal value As String)
            m_sDiChi = value
        End Set
    End Property


    Private m_dtNgaySinh As DateTime
    Public Property NgaySinh() As DateTime
        Get
            Return m_dtNgaySinh
        End Get
        Set(ByVal value As DateTime)
            m_dtNgaySinh = value
        End Set
    End Property


    Private m_sEmail As String
    Public Property Email() As String
        Get
            Return m_sEmail
        End Get
        Set(ByVal value As String)
            m_sEmail = value
        End Set
    End Property



    Private m_dtNgayLapThe As DateTime
    Public Property NgayLapThe() As DateTime
        Get
            Return m_dtNgayLapThe
        End Get
        Set(ByVal value As DateTime)
            m_dtNgayLapThe = value
        End Set
    End Property



    Private m_dtNgayHetHan As DateTime
    Public Property NgayHetHan() As DateTime
        Get
            Return m_dtNgayHetHan
        End Get
        Set(ByVal value As DateTime)
            m_dtNgayHetHan = value
        End Set
    End Property


    Private m_iTongNo As Integer
    Public Property TongNo() As Integer
        Get
            Return m_iTongNo
        End Get
        Set(ByVal value As Integer)
            m_iTongNo = value
        End Set
    End Property



    Private m_iMaLoaiDocGia As Integer
    Public Property MaLoaiDocGia() As Integer
        Get
            Return m_iMaLoaiDocGia
        End Get
        Set(ByVal value As Integer)
            m_iMaLoaiDocGia = value
        End Set
    End Property


    Private m_iMaNhanVien As Integer
    Public Property MaNhanVien() As Integer
        Get
            Return m_iMaNhanVien
        End Get
        Set(ByVal value As Integer)
            m_iMaNhanVien = value
        End Set
    End Property

    Private m_sTenLoaiDocGia As String
    Public Property TenLoaiDocGia() As String
        Get
            Return m_sTenLoaiDocGia
        End Get
        Set(ByVal value As String)
            m_sTenLoaiDocGia = value
        End Set
    End Property

    Private m_sTenNhanVien As String
    Public Property TenNhanVien() As String
        Get
            Return m_sTenNhanVien
        End Get
        Set(ByVal value As String)
            m_sTenNhanVien = value
        End Set
    End Property

    Public Sub New()

    End Sub

    Public Sub New(ByVal _reader As IDataReader)
        Me.m_iMa = _reader("Ma")
        Me.m_sHoTen = _reader("HoTen")
        Me.m_sDiChi = _reader("DiaChi")
        Me.m_dtNgaySinh = _reader("NgaySinh")
        Me.m_sEmail = _reader("Email")
        Me.m_iTongNo = _reader("TongNo")
        Me.m_dtNgayLapThe = _reader("NgayLapThe")
        Me.m_dtNgayHetHan = _reader("NgayHetHan")
        Me.m_iMaLoaiDocGia = _reader("MaLoaiDocGia")
        Me.m_iMaNhanVien = _reader("MaNhanVien")
    End Sub

End Class
